home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / flilib.zip / FLISRC.ZIP / OPENFLI.C < prev    next >
C/C++ Source or Header  |  1990-02-26  |  321b  |  19 lines
  1.  
  2. #include "aafli.h"
  3.  
  4. Jfile fli_open(char *fliname, Fli_head *fh)
  5. {
  6. Jfile ff;
  7.  
  8. if ((ff = dos_open (fliname, DOS_READ_ONLY)) == 0)
  9.     return(AA_ERR_CANTFIND);
  10. if (dos_read(ff, fh, (long)sizeof(*fh)) == sizeof(*fh))
  11.     {
  12.     if (fh->type == FLIH_MAGIC)
  13.         return(ff);
  14.     }
  15. dos_close (ff);
  16. return(AA_ERR_BADTYPE);
  17. }
  18.  
  19.